Menu Planner/Menu Planner (Ohio Distinctive Software).ISO/mac/Menu Planner CD/savedlog.Dir/00005.ls

Text File | 1995-11-07 | 483 b | 33 lines

on startMovie
  set the keyDownScript to "getReturns"
end

on GetReturns
  if the key = RETURN then
    ButtonClick("Yes")
  else
    pass()
  end if
end

on ButtonClick theButton
  global gParentWindow
  tell the stage
    SetShouldSaveResult(theButton)
  end tell
end

on setSaveFrame theFrame
  global saveFrame
  set saveFrame to theFrame
  go(saveFrame)
end

on SetMessage theMessage
end

on SetParentWindow theParent
  global gParentWindow
  set gParentWindow to theParent
end